concerto.unserialize <-
function(){
  print("unserializing session...")
  restore.session(concerto$sessionPath)
}
